Fill Emacs version on about screen

* lisp/startup.el (fancy-about-text): Fill the Emacs version,
since it's too long these days.

diff --git a/lisp/startup.el b/lisp/startup.el
index d4bb338fc0bea5dd07a6cc078bcba7c4c6b4fb7f..a57ce3da05f27a9c3a8c21cadcfe4b27c2577dc3 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1651,7 +1651,11 @@ Each element in the list should be a list of strings or pairs
      " operating system.\n"
      :face (variable-pitch font-lock-builtin-face)
      "\n"
-     ,(lambda () (emacs-version))
+     ,(lambda ()
+        (with-temp-buffer
+          (insert (emacs-version))
+          (fill-region (point-min) (point-max))
+          (buffer-string)))
      "\n"
      :face (variable-pitch (:height 0.8))
      ,(lambda () emacs-copyright)